home *** CD-ROM | disk | FTP | other *** search
/ Chip: 2001 Haziran / CHIP Haziran2001.iso / prog / online / 02 / setup.exe / data1.cab / Configuration_Files / conlog.scr next >
Encoding:
Text File  |  2000-01-25  |  858 b   |  22 lines

  1. 10  REM ******************************************************
  2. 20  REM * Name       : Sample Script 1 (logcon.scr)
  3. 30  REM * Created    : April 21/1999 SAE
  4. 40  REM * Revised    : 
  5. 50  REM * Description: This is a script file in BASIC
  6. 60  REM *              that logs all occurances of connection
  7. 70  REM *              to and from the Internet. The log file
  8. 80  REM *              is stored in file C:\DYNIP-CON.LOG
  9. 90  REM ******************************************************
  10. 100 REM
  11. 110 logfile$="c:/dynip-con.log"
  12. 120 open logfile$ for append as #1
  13. 130 logdate$=date("dd-MM-yyyy hh:mm:ss")
  14. 140 a=val(sysvar(CONNECTSTATUS))
  15. 150 if a = 1 then msg$="Connection to the Internet established" else msg$="Disconnect from the Internet"
  16. 160 print #1,logdate$;" ";sysvar(INTERNETNAME);" (";sysvar(IPADDRESS);") ";msg$
  17. 170 close #1
  18. 180 end
  19.  
  20.  
  21.  
  22.